home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 11 / Info-Mac_XI_Disc_1.cdr_ / Info-Mac XI Disc 1.cdr / Programs / Disk & File / touchMe 1.1.2 / sample scripts / sample 3 < prev    next >
Encoding:
Text File  |  1997-02-10  |  713 b   |  22 lines  |  [TEXT/ToyS]
  1. -- Sample AppleScripts for touchMe, 1996 (C) Mizutori Tetsuya
  2. -- An applet to change the date time stamp of the given folder
  3. -- and all the items in the folder have the same stamp to the folder.
  4. -- Let's start to select a target folder!
  5.  
  6. set theFolder to (choose folder)
  7.  
  8. set docList to {}
  9. repeat with theItem in the list folder theFolder
  10.     copy docList & (alias ((theFolder as string) & theItem)) to docList
  11. end repeat
  12.  
  13. -- Once again 'theFolder' after the operations on items in the folder have finished.
  14. -- This is because the stamp of the folder may be updated if some items in it have changed.
  15. copy theFolder & docList & theFolder to docList
  16.  
  17. tell application "touchMe"
  18.     activate
  19.     touch docList
  20.     quit
  21. end tell
  22.